﻿Public Class DocumentoAlmacenPickeadorTiempo

    Dim _CIA, _SUC, _ALM, _TDOC As String
    Dim _DALCOD, _PICKCOD As String
    Dim _EVECOD As String
    Dim _DAPCOD As Integer
    Dim _FECASIG As String

    Sub New()

    End Sub

    Sub New(dapcod As Integer, cia As String, suc As String, alm As String, tdoc As String, ByVal dalcod As String, ByVal pickcod As String, fechaasig As String, ByVal evecod As String)
        Me._CIA = cia
        Me._SUC = suc
        Me._ALM = alm
        Me._TDOC = tdoc
        Me._DAPCOD = dapcod
        Me._DALCOD = dalcod
        Me._PICKCOD = pickcod
        Me._FECASIG = fechaasig
        Me._EVECOD = evecod
    End Sub

    Public Property DAP_Codigo() As Integer
        Get
            Return _DAPCOD
        End Get
        Set(ByVal value As Integer)
            _DAPCOD = value
        End Set
    End Property

    Public Property CIA() As String
        Get
            Return _CIA
        End Get
        Set(ByVal value As String)
            _CIA = value
        End Set
    End Property

    Public Property SUC_Codigo() As String
        Get
            Return _SUC
        End Get
        Set(ByVal value As String)
            _SUC = value
        End Set
    End Property

    Public Property ALM_Codigo() As String
        Get
            Return _ALM
        End Get
        Set(ByVal value As String)
            _ALM = value
        End Set
    End Property

    Public Property TDOC_Codigo() As String
        Get
            Return _TDOC
        End Get
        Set(ByVal value As String)
            _TDOC = value
        End Set
    End Property

    Public Property DAL_Codigo() As String
        Get
            Return _DALCOD
        End Get
        Set(ByVal value As String)
            _DALCOD = value
        End Set
    End Property

    Public Property PICK_Codigo() As String
        Get
            Return _PICKCOD
        End Get
        Set(ByVal value As String)
            _PICKCOD = value
        End Set
    End Property

    Public Property FECHA_ASIG() As String
        Get
            Return _FECASIG
        End Get
        Set(value As String)
            _FECASIG = value
        End Set
    End Property

    Public Property EVE_Codigo() As String
        Get
            Return _EVECOD
        End Get
        Set(ByVal value As String)
            _EVECOD = value
        End Set
    End Property

End Class
